home *** CD-ROM | disk | FTP | other *** search
/ Play Windows 1995 October / CD [playwin].bin / mac / demo / 00135.ls < prev    next >
Encoding:
Text File  |  1995-08-11  |  264 b   |  14 lines
  1. on mouseUp
  2.   puppetSprite(12, 1)
  3.   set the castNum of sprite 12 to 132
  4.   updateStage()
  5.   sound playFile 1, "click"
  6.   repeat while soundBusy(1)
  7.     nothing()
  8.   end repeat
  9.   set the castNum of sprite 12 to 131
  10.   updateStage()
  11.   puppetSprite(12, 0)
  12.   go("hcmax")
  13. end
  14.